/ EuroCD 3 / EuroCD 3.iso / Programming / BlitzBasic / Gorny3Dset / DEMO.BB2

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 20 32 42 33 44 20 42 | 4c 49 54 5a 20 42 41 53 |; 2B3D B|LITZ BAS|
|00000010| 49 43 20 49 49 20 33 44 | 20 47 46 58 20 4c 49 42 |IC II 3D| GFX LIB|
|00000020| 52 41 52 59 00 3b 00 3b | 20 42 41 53 49 43 20 43 |RARY.;.;| BASIC C|
|00000030| 55 42 45 20 44 45 4d 4f | 00 3b 00 3b 00 00 00 00 |UBE DEMO|.;.;....|
|00000040| 00 80 13 20 22 62 6c 69 | 74 7a 32 3a 33 64 65 6e |... "bli|tz2:3den|
|00000050| 67 69 6e 65 2f 33 64 2e | 6c 69 62 22 00 00 50 4c |gine/3d.|lib"..PL|
|00000060| 47 4c 6f 61 64 4f 62 6a | 65 63 74 7b 22 63 75 62 |GLoadObj|ect{"cub|
|00000070| 65 2e 70 6c 67 22 2c 32 | 7d 20 20 20 20 20 20 20 |e.plg",2|}       |
|00000080| 3b 20 2e 2e 2e 00 50 6f | 73 69 74 69 6f 6e 4f 62 |; ....Po|sitionOb|
|00000090| 6a 65 63 74 7b 30 2c 30 | 2c 37 35 30 7d 20 20 20 |ject{0,0|,750}   |
|000000a0| 20 20 3b 00 00 cf 01 20 | 30 2c 30 2c 30 2c 33 32 |  ;.... |0,0,0,32|
|000000b0| 30 2c 32 30 30 2c 34 2c | 30 2c 22 22 2c 31 2c 32 |0,200,4,|0,"",1,2|
|000000c0| 00 c5 01 20 30 2c 30 2c | 30 2c 33 32 30 2c 32 30 |... 0,0,|0,320,20|
|000000d0| 30 2c 36 31 34 34 2c 22 | 22 2c 31 2c 32 00 00 80 |0,6144,"|",1,2...|
|000000e0| 2c 20 c3 02 20 30 00 00 | d0 01 20 30 2c 33 32 30 |, .. 0..|.. 0,320|
|000000f0| 2c 32 30 30 2c 34 00 d0 | 01 20 31 2c 33 32 30 2c |,200,4..|. 1,320,|
|00000100| 32 30 30 2c 34 00 00 64 | 62 2e 62 3d 30 00 64 6f |200,4..d|b.b=0.do|
|00000110| 6e 65 2e 62 3d bc 0f 00 | 00 63 31 2e 72 67 62 74 |ne.b=...|.c1.rgbt|
|00000120| 79 70 65 5c 72 3d 30 2c | 30 2c 30 00 63 32 2e 72 |ype\r=0,|0,0.c2.r|
|00000130| 67 62 74 79 70 65 5c 72 | 3d 31 35 2c 38 2c 30 00 |gbtype\r|=15,8,0.|
|00000140| 54 6f 75 63 68 50 61 6c | 65 74 74 65 7b 30 2c 31 |TouchPal|ette{0,1|
|00000150| 35 2c 63 31 2c 63 32 7d | 00 00 44 69 73 70 6c 61 |5,c1,c2}|..Displa|
|00000160| 79 33 44 7b 33 32 30 2c | 32 30 30 2c 33 30 30 7d |y3D{320,|200,300}|
|00000170| 00 00 46 72 75 73 74 75 | 6d 7b 35 30 30 2c 33 30 |..Frustu|m{500,30|
|00000180| 30 30 7d 00 43 6c 69 70 | 4d 6f 64 65 7b 23 5a 50 |00}.Clip|Mode{#ZP|
|00000190| 4c 41 4e 45 7d 00 41 6d | 62 69 65 6e 74 4c 69 67 |LANE}.Am|bientLig|
|000001a0| 68 74 7b 34 7d 00 00 61 | 6e 67 6c 65 78 2e 77 3d |ht{4}..a|nglex.w=|
|000001b0| 30 00 61 6e 67 6c 65 79 | 2e 77 3d 30 00 61 6e 67 |0.angley|.w=0.ang|
|000001c0| 6c 65 7a 2e 77 3d 30 00 | 73 70 65 65 64 3d 32 35 |lez.w=0.|speed=25|
|000001d0| 00 00 c5 3f 20 64 62 2c | 30 00 00 80 bb 00 20 20 |...? db,|0.....  |
|000001e0| 65 76 2e 6c 3d c5 03 00 | 20 20 80 0b 20 65 76 3d |ev.l=...|  .. ev=|
|000001f0| 24 34 30 30 3b 6b 65 79 | 70 72 65 73 73 00 20 20 |$400;key|press.  |
|00000200| 20 20 6b 65 79 70 72 65 | 73 73 2e 73 3d dd 02 00 |  keypre|ss.s=...|
|00000210| 20 20 20 20 80 0e 20 c5 | 14 00 20 20 20 20 20 20 |    .. .|..      |
|00000220| 80 0f 20 24 34 35 20 3b | 45 53 43 00 20 20 20 20 |.. $45 ;|ESC.    |
|00000230| 20 20 20 20 64 6f 6e 65 | 3d bc 0e 00 20 20 20 20 |    done|=...    |
|00000240| 20 20 80 0f 20 24 34 63 | 20 3b 75 70 00 20 20 20 |  .. $4c| ;up.   |
|00000250| 20 20 20 20 20 4d 6f 76 | 65 46 6f 72 77 61 72 64 |     Mov|eForward|
|00000260| 7b 73 70 65 65 64 7d 00 | 20 20 20 20 20 20 80 0f |{speed}.|      ..|
|00000270| 20 24 34 64 20 3b 64 6f | 77 6e 00 20 20 20 20 20 | $4d ;do|wn.     |
|00000280| 20 20 20 4d 6f 76 65 46 | 6f 72 77 61 72 64 7b 2d |   MoveF|orward{-|
|00000290| 73 70 65 65 64 7d 00 20 | 20 20 20 20 20 80 0f 20 |speed}. |     .. |
|000002a0| 24 34 66 20 3b 6c 65 66 | 74 00 20 20 20 20 20 20 |$4f ;lef|t.      |
|000002b0| 20 20 61 6e 67 6c 65 79 | 2d 32 3a 80 0b 20 61 6e |  angley|-2:.. an|
|000002c0| 67 6c 65 79 3c 30 20 80 | 21 20 61 6e 67 6c 65 79 |gley<0 .|! angley|
|000002d0| 3d 33 36 30 00 20 20 20 | 20 20 20 20 20 56 69 65 |=360.   |     Vie|
|000002e0| 77 41 6e 67 6c 65 7b 61 | 6e 67 6c 65 78 2c 20 61 |wAngle{a|nglex, a|
|000002f0| 6e 67 6c 65 79 2c 20 61 | 6e 67 6c 65 7a 7d 00 20 |ngley, a|nglez}. |
|00000300| 20 20 20 20 20 80 0f 20 | 24 34 65 20 3b 72 69 67 |     .. |$4e ;rig|
|00000310| 68 74 00 20 20 20 20 20 | 20 20 20 61 6e 67 6c 65 |ht.     |   angle|
|00000320| 79 2b 32 3a 80 0b 20 61 | 6e 67 6c 65 79 3e 33 36 |y+2:.. a|ngley>36|
|00000330| 30 20 80 21 20 61 6e 67 | 6c 65 79 3d 30 00 20 20 |0 .! ang|ley=0.  |
|00000340| 20 20 20 20 20 20 56 69 | 65 77 41 6e 67 6c 65 7b |      Vi|ewAngle{|
|00000350| 61 6e 67 6c 65 78 2c 20 | 61 6e 67 6c 65 79 2c 20 |anglex, |angley, |
|00000360| 61 6e 67 6c 65 7a 7d 00 | 20 20 20 20 20 20 80 0f |anglez}.|      ..|
|00000370| 20 24 30 31 20 3b 22 31 | 22 00 20 20 20 20 20 20 | $01 ;"1|".      |
|00000380| 20 20 73 70 65 65 64 2d | 35 3a 80 0b 20 73 70 65 |  speed-|5:.. spe|
|00000390| 65 64 3c 35 20 80 21 20 | 73 70 65 65 64 3d 35 00 |ed<5 .! |speed=5.|
|000003a0| 20 20 20 20 20 20 80 0f | 20 24 30 32 20 3b 22 32 |      ..| $02 ;"2|
|000003b0| 22 00 20 20 20 20 20 20 | 20 20 73 70 65 65 64 2b |".      |  speed+|
|000003c0| 35 00 20 20 20 20 20 20 | 80 0f 20 24 31 30 20 3b |5.      |.. $10 ;|
|000003d0| 22 51 22 00 20 20 20 20 | 20 20 20 20 4d 6f 76 65 |"Q".    |    Move|
|000003e0| 55 70 7b 73 70 65 65 64 | 7d 00 20 20 20 20 20 20 |Up{speed|}.      |
|000003f0| 80 0f 20 24 32 30 20 3b | 22 41 22 00 20 20 20 20 |.. $20 ;|"A".    |
|00000400| 20 20 20 20 4d 6f 76 65 | 44 6f 77 6e 7b 73 70 65 |    Move|Down{spe|
|00000410| 65 64 7d 00 20 20 20 20 | 80 02 20 80 0e 00 20 20 |ed}.    |.. ...  |
|00000420| 80 c0 00 20 20 20 20 52 | 6f 74 61 74 65 4f 62 6a |...    R|otateObj|
|00000430| 65 63 74 7b 35 2c 35 2c | 30 2c 30 7d 00 20 20 20 |ect{5,5,|0,0}.   |
|00000440| 20 4e 65 77 56 69 65 77 | 7b 7d 00 20 20 20 20 64 | NewView|{}.    d|
|00000450| 62 3d 31 2d 64 62 00 20 | 20 20 20 80 2c 20 d0 01 |b=1-db. |   ., ..|
|00000460| 20 64 62 00 20 20 20 20 | b2 05 20 30 00 20 20 20 | db.    |.. 0.   |
|00000470| 20 c7 02 20 64 62 00 20 | 20 20 20 50 61 69 6e 74 | .. db. |   Paint|
|00000480| 46 72 61 6d 65 7b 7d 00 | 20 20 20 20 c5 3f 20 64 |Frame{}.|    .? d|
|00000490| 62 2c 30 00 80 bc 20 64 | 6f 6e 65 00 80 02 00 00 |b,0... d|one.....|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00          |........|.....   |
+--------+-------------------------+-------------------------+--------+--------+